﻿Namespace BusinessRule

    Public Class Transaction
        Private _getInstance As New WebCredit.ORM.Transaction_ORM
        Public Property getInstance() As WebCredit.ORM.Transaction_ORM
            Get
                Return _getInstance
            End Get
            Set(ByVal value As WebCredit.ORM.Transaction_ORM)
                _getInstance = value
            End Set
        End Property

        Public Function Insert(ByRef transaction As EntityClass.Transaction_Entity) As Integer

            Return getInstance.InsertOne(transaction)

        End Function

    End Class

End Namespace